(defun local-load( fname )
  (if *load-pathname*
      (load (merge-pathnames fname *load-pathname*))
      (load fname)))

(defun licada-load-all()
  (local-load "packages.lisp")
  (local-load "utility.lisp" )
  (local-load "cpp-integrate.lisp")
  (local-load "licada-errors.lisp"))

(licada-load-all)

